Chip 1998 May/CHIP Turkiye Mayıs 1998.iso/grafik/95NEOBOK/NBW30.EXE/NeoBook.exe/0/RCDATA/TFILEINSPECTORFORM/TFILEINSPECTORFORM.txt

Text File | 1997-02-27 | 5KB | 209 lines

object FileInspectorForm: TFileInspectorForm
  Left = 421
  Top = 94
  BorderIcons = [biSystemMenu]
  BorderStyle = bsNone
  Caption = 'File List'
  ClientHeight = 303
  ClientWidth = 189
  Font.Color = clBtnText
  Font.Height = -12
  Font.Name = 'Arial'
  Font.Style = []
  FormStyle = fsStayOnTop
  Scaled = False
  OnCreate = FormCreate
  OnHide = FormHide
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 15
  object MainPanel: TPanel
    Left = 0
    Top = 0
    Width = 189
    Height = 303
    Align = alClient
    BorderWidth = 3
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    OnMouseDown = TitleBarMouseDown
    OnMouseMove = MainPanelMouseMove
    OnMouseUp = TitleBarMouseUp
    object TitleBar: TPanel
      Left = 4
      Top = 4
      Width = 181
      Height = 18
      Align = alTop
      Alignment = taLeftJustify
      BevelOuter = bvNone
      Caption = ' Drag && Drop File Selector'
      Color = clActiveCaption
      Font.Color = clCaptionText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnMouseDown = TitleBarMouseDown
      OnMouseMove = TitleBarMouseMove
      OnMouseUp = TitleBarMouseUp
      object SysPanel: TPanel
        Left = 150
        Top = 0
        Width = 31
        Height = 18
        Align = alRight
        BevelOuter = bvNone
        ParentColor = True
        TabOrder = 0
        OnMouseDown = TitleBarMouseDown
        OnMouseMove = TitleBarMouseMove
        OnMouseUp = TitleBarMouseUp
        object RollUpBtn: TSpeedButton
          Left = 2
          Top = 4
          Width = 12
          Height = 12
          OnClick = RollUpBtnClick
        end
        object CloseBtn: TSpeedButton
          Left = 16
          Top = 4
          Width = 12
          Height = 12
          Glyph.Data = {
            92000000424D9200000000000000760000002800000008000000070000000100
            0400000000001C00000000000000000000001000000010000000000000000000
            BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777007
            70077700007777700777770000777007700777777777}
          Margin = 0
          OnClick = CloseBtnClick
        end
      end
    end
    object Spacer1: TPanel
      Left = 4
      Top = 22
      Width = 181
      Height = 4
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 1
    end
    object OkBtn: TButton
      Left = -35
      Top = 32
      Width = 29
      Height = 29
      Default = True
      TabOrder = 2
      OnClick = OkBtnClick
    end
    object FilePanel: TPanel
      Left = 4
      Top = 26
      Width = 181
      Height = 273
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 3
      object FilterPanel: TPanel
        Left = 0
        Top = 245
        Width = 181
        Height = 28
        Align = alBottom
        BevelOuter = bvNone
        Caption = 'FilterPanel'
        TabOrder = 0
        object Label1: TLabel
          Left = 0
          Top = 8
          Width = 52
          Height = 15
          Caption = 'File Type:'
        end
        object FilterBox: TComboBox
          Left = 56
          Top = 4
          Width = 116
          Height = 23
          ItemHeight = 15
          Items.Strings = (
            '*.*'
            '*.BMP *.GIF *.PCX *.PNG *.JPG *.TIF *.ICO *.WMF'
            '*.TXT *.DOC'
            '*.WAV *.MID'
            '*.AVI *.MOV *.MPG;*.FLI;*.FLC'
            '*.EXE *.COM *.PIF *.LNK *.BAT')
          TabOrder = 0
          Text = '*.*'
          OnChange = FilterBoxChange
          OnDropDown = FilterBoxDropDown
          OnExit = FilterBoxExit
          OnKeyDown = FilterBoxKeyDown
        end
      end
      object LocationPanel: TPanel
        Left = 0
        Top = 0
        Width = 181
        Height = 17
        Hint = 'Drag files from here and drop them on your publication'
        Align = alTop
        Alignment = taLeftJustify
        BevelOuter = bvNone
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object Panel1: TPanel
        Left = 0
        Top = 17
        Width = 181
        Height = 228
        Align = alClient
        BevelOuter = bvLowered
        BorderWidth = 1
        TabOrder = 2
        object FileList: TFileList
          Left = 2
          Top = 2
          Width = 177
          Height = 224
          Cursor = 3
          Align = alClient
          BorderStyle = bsNone
          Ctl3D = False
          DragCursor = 8
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ItemHeight = 18
          MultiSelect = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          OnDblClick = FileListDblClick
          OnDragOver = FileListDragOver
          OnMouseMove = FileListMouseMove
          OnChange = FileListChange
          FileMask = '*.*'
          TextCase = tcNone
          FileDetails = [fdName]
          ListDetails = [ldDrives, ldSystemDirectories, ldDirectories, ldFiles]
          SearchMode = smNormal
          BusyCursor = crHourGlass
          HighlightFG = clHighlightText
          HighlightBG = clHighlight
        end
      end
    end
  end
end